home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / BAZ_TLOK.ZIP / BAZ_TLOK.TXT
Text File  |  1996-12-31  |  2KB  |  58 lines
  1. This script Will be a part of []baz▀ot[] v2.╪ made by Ronny 1996 ⌐
  2. the carrent script was made by baz`oo`ka.
  3.  
  4. All you need to do is to add the folowing in to the indicated section of tools
  5.  
  6. Note. This script is basicly made for a bot, so to Lock and Unlock 
  7.       the topic the user goto have atleast level 400, allsow a person
  8.       with level 100 and up can check to see if a topic lock is 
  9.       setted.
  10.  
  11. *** mIRC v4.7 ONLY! ***
  12.  
  13. Remote Events:
  14.  
  15. 1:on text:!lock:#: {
  16.   if ($level($address($nick,3)) < 400) { msg $chan Sorry $nick but you dont have enough access for that command. }
  17.   else {
  18.     set %topic [ $+ [ $chan ] ] $chan($chan).topic
  19.     notice $chan Topic Set For $chan $+ : $chan($chan).topic
  20.   }
  21. }
  22.  
  23. 1:on text:!unlock:#: {
  24.   if ($level($address($nick,3)) < 400) { msg $chan sorry $nick but you dont have enough access for that command. }
  25.   else { /notice $chan Topic Lock is _-Off-_ | unset %topic [ $+ [ $chan ] ] }
  26. }
  27.  
  28. 100:on text:!showlock:#: {
  29.   if (%topic [ $+ [ $chan ] ] != $null) { notice $chan Topic Set for $chan $+ : %topic [ $+ [ $chan ] ] }
  30.   else { notice $chan No Topic is set. }
  31. }
  32.  
  33. !1:ON TOPIC:#:  {
  34.   if %topic [ $+ [ $chan ] ] == $null { halt }
  35.   elseif ($chan($chan).topic != %topic [ $+ [ $chan ] ])  {
  36.     notice $chan Topic Lock Is _-On-_
  37.     /topic $chan  %topic [ $+ [ $chan ] ] 
  38.   }
  39.   :annoy
  40.   if ($nick !isin %annoyer) && ($nick !isin %annoyer1) { set %annoyer %annoyer $nick | timer 1 300 /unset %annoyer* }
  41.   elseif ($nick isin %annoyer) && ($nick !isin %annoyer1) { set %annoyer1 %annoyer1 $nick }
  42.   elseif ($nick isin %annoyer1) { unset %annoyer1 %annoyer | ban -u300 $chan $nick 3 | kick $chan $nick º╗í½º []baz▀ot[] The Topic Lock iS On.. WhiCh Part DidNt You Get?? CoMe BaCk iN FiVe MiNuTeS WheN You FeeL Like You Can BeHave! []baz▀ot[] º╗í½º }
  43. }
  44.  
  45. 1:on op:#: {
  46.   if ($opnick != $me) { halt }
  47.   else {
  48.    if (%topic [ $+ [ $chan ] ] == $chan($chan).topic) { halt }
  49.    elseif (%topic [ $+ [ $chan ] ] != $null) { topic $chan %topic [ $+ [ $chan ] ] }
  50.  }
  51. }
  52.  
  53.  
  54.                                                                                                                              └!≡         F            
  55.           ▐    ∙           ∙  
  56.        Ç  y   Ç  y   (  Times New Roman     Symbol & Arial   Ç ≈  ≈    Ç Ç≈      É  "  Ç   ╨  h    ps åps å                      .   fjgksag   
  57. Randy Ross
  58. Randy Ross